﻿Public Class StudentClass
    'This class will model the student. Contains all propeties that are included in the data model 
    'and the associated get and set methods/properties

    'class variables
    Private std_ID As Integer
    Private std_LName As String
    Private std_Fname As String
    Private std_Address As String
    Private std_City As String
    Private std_State As String
    Private std_ZipCode As Integer
    Private std_Email As String
    Private stdtype_TypeID As Integer

    Public Sub New()

    End Sub

    Public Sub New(ByVal id As Integer, lname As String, fname As String, address As String, city As String, state As String,
                   zipcode As Integer, email As String, studtypeId As Integer)
        std_ID = id
        std_LName = lname
        std_Fname = fname
        std_Address = address
        std_City = city
        std_State = state
        std_ZipCode = zipcode
        std_Email = email
        stdtype_TypeID = studtypeId
    End Sub


    Public Property studentID()
        Set(value)
            std_ID = value
        End Set
        Get
            Return std_ID
        End Get
    End Property

    Public Property studentLName()
        Set(value)
            std_LName = value
        End Set
        Get
            Return std_LName
        End Get
    End Property

    Public Property studentFname()
        Set(value)
            std_Fname = value
        End Set
        Get
            Return std_Fname
        End Get
    End Property

    Public Property studentAddress()
        Set(value)
            std_Address = value
        End Set
        Get
            Return std_Address
        End Get
    End Property

    Public Property studentCity()
        Set(value)
            std_City = value
        End Set
        Get
            Return std_City
        End Get
    End Property

    Public Property studentState()
        Set(value)
            std_State = value
        End Set
        Get
            Return std_State
        End Get
    End Property

    Public Property studentZip()
        Set(value)
            std_ZipCode = value
        End Set
        Get
            Return std_ZipCode
        End Get
    End Property

    Public Property studentEmail()
        Set(value)
            std_Email = value
        End Set
        Get
            Return std_Email
        End Get
    End Property

    Public Property studentTypeId()
        Set(value)
            stdtype_TypeID = value
        End Set
        Get
            Return stdtype_TypeID
        End Get
    End Property


End Class